home *** CD-ROM | disk | FTP | other *** search
/ Complete Linux / Complete Linux.iso / docs / apps / database / ingres04.lzh / source / parser / s_inout.c < prev    next >
Encoding:
C/C++ Source or Header  |  1985-01-23  |  398 b   |  27 lines
  1. # include <ingres.h>
  2. # include "scanner.h"
  3. # include    <sccs.h>
  4.  
  5. SCCSID(@(#)s_inout.c    8.1    12/31/84)
  6.  
  7. /* TWO CHARACTER STACK FOR 'UNGETC' BACKUP */
  8. char    Pchar[2];
  9. int    Pctr;
  10.  
  11.  
  12. /*
  13. ** BACKUP
  14. ** saves the character argument in the global stack 'Pchar'
  15. **/
  16. backup(chr)
  17. char    chr;
  18. {
  19.     extern int    yyline;
  20.  
  21.     if (Pctr == 2)
  22.         syserr("overflow in backup()");
  23.     Pchar[Pctr++] = chr;
  24.     if (chr == '\n')
  25.         yyline--;
  26. }
  27.